﻿Imports OpenDelib.ServiceDeliberations

Public Class ListeCommissions
    Inherits ListeDossiersPage(Of ServiceDeliberations.Commission)

    Public Overrides ReadOnly Property Titre As String
        Get
            Return "Liste des commissions"
        End Get
    End Property
    Protected Overrides ReadOnly Property TypeDelib As TypeDeliberation
        Get
            Return TypeDeliberation.Commission
        End Get
    End Property
    Protected Overrides ReadOnly Property LibelleDossier As String
        Get
            Return "commission"
        End Get
    End Property
    Protected Overrides ReadOnly Property LibelleFeminin As Boolean
        Get
            Return True
        End Get
    End Property
    Protected Overrides ReadOnly Property UrlFicheDossier As String
        Get
            Return "~/Commission/FicheCommission.aspx"
        End Get
    End Property
    Protected Overrides ReadOnly Property HiddenFieldIndexTabs As HiddenField
        Get
            Return Me.hfIndexTabs
        End Get
    End Property
    Protected Overrides ReadOnly Property BoutonActualiser As Button
        Get
            Return Me.btnActualiser
        End Get
    End Property
    Protected Overrides ReadOnly Property BoutonAjouterDossier As Button
        Get
            Return Me.btnAjouterDossier
        End Get
    End Property
    Protected Overrides ReadOnly Property DivTabs As HtmlGenericControl
        Get
            Return Me.tabs
        End Get
    End Property
    Protected Overrides ReadOnly Property GridViewsFields As List(Of GridViewBoundField)
        Get
            Dim fields As New List(Of GridViewBoundField)
            fields.Add(New GridViewBoundField("CodeDossier", "Code", , , HorizontalAlign.Center))
            fields.Add(New GridViewBoundField("Identificateur", "Identificateur"))
            fields.Add(New GridViewBoundField("NombreMembres", "Membres", , , HorizontalAlign.Center))
            fields.Add(New GridViewBoundField("NombreRapports", "Rapports", , , HorizontalAlign.Center))
            fields.Add(New GridViewBoundField("NombreAssemblees", "Assemblées", , , HorizontalAlign.Center))
            Return fields
        End Get
    End Property


    Protected Overrides Function Search(svc As DeliberationsClient, params As ParametresListe) As ResultatListeDossiersDeliberation
        Return New ResultatListeDossiersDeliberation(svc.ListeCommissions(params))
    End Function

End Class